From: Jason Rumney Date: Mon, 1 Sep 2003 21:35:48 +0000 (+0000) Subject: (tit-read-key-value): Include \r in regexp. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~25646 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=6cf5b24c7eacc8c30534be78b49e280c66f685b2;p=emacs.git (tit-read-key-value): Include \r in regexp. --- diff --git a/lisp/international/titdic-cnv.el b/lisp/international/titdic-cnv.el index 162c84da301..118fe2c2494 100644 --- a/lisp/international/titdic-cnv.el +++ b/lisp/international/titdic-cnv.el @@ -206,7 +206,7 @@ SPC, 6, 3, 4, or 7 specifing a tone (SPC:$(0?v(N(B, 6:$(0Dm(N(B, 3:$(0&9Vy ;; Return a value of the key in the current line. (defsubst tit-read-key-value () - (if (looking-at "[^ \t\n]+") + (if (looking-at "[^ \t\r\n]+") (car (read-from-string (concat "\"" (match-string 0) "\""))))) ;; Return an appropriate quail-package filename from FILENAME (TIT